home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / hypercar / xcmd / xrulesde.sit / Xrules™ Demo / card_6637.txt < prev    next >
Encoding:
Text File  |  1991-06-24  |  2.8 KB  |  143 lines

  1. -- card: 6637 from stack: in
  2. -- bmap block id: 6780
  3. -- flags: 4000
  4. -- background id: 6334
  5. -- name: fact
  6. ----- HyperTalk script -----
  7. on openCard
  8.   put "" into card field "answer"
  9.   select after text of card field "answer"
  10. end openCard
  11.  
  12.  
  13.  
  14. -- part 5 (button)
  15. -- low flags: 00
  16. -- high flags: 8003
  17. -- rect: left=364 top=251 right=266 bottom=445
  18. -- title width / last selected line: 0
  19. -- icon id / first selected line: 0 / 0
  20. -- text alignment: 1
  21. -- font id: 0
  22. -- text size: 12
  23. -- style flags: 0
  24. -- line height: 16
  25. -- part name: don't know
  26. ----- HyperTalk script -----
  27. on mouseUp
  28.   global direction
  29.  
  30.   putIntoFact "*",the short name of this card
  31.   chain direction
  32. end mouseUp
  33.  
  34.  
  35.  
  36. -- part 6 (button)
  37. -- low flags: 00
  38. -- high flags: 8003
  39. -- rect: left=364 top=225 right=240 bottom=445
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 1
  43. -- font id: 0
  44. -- text size: 12
  45. -- style flags: 0
  46. -- line height: 16
  47. -- part name: don't know
  48. ----- HyperTalk script -----
  49. on mouseUp
  50.   global direction
  51.  
  52.   putIntoFact "?",the short name of this card
  53.   chain direction
  54. end mouseUp
  55.  
  56.  
  57.  
  58. -- part 7 (button)
  59. -- low flags: 00
  60. -- high flags: 8003
  61. -- rect: left=363 top=199 right=214 bottom=444
  62. -- title width / last selected line: 0
  63. -- icon id / first selected line: 0 / 0
  64. -- text alignment: 1
  65. -- font id: 0
  66. -- text size: 12
  67. -- style flags: 0
  68. -- line height: 16
  69. -- part name: don't know
  70. ----- HyperTalk script -----
  71. on mouseUp
  72.   global direction
  73.  
  74.   putIntoFact "",the short name of this card
  75.   chain direction
  76. end mouseUp
  77.  
  78.  
  79.  
  80. -- part 8 (button)
  81. -- low flags: 00
  82. -- high flags: 8003
  83. -- rect: left=363 top=174 right=189 bottom=444
  84. -- title width / last selected line: 0
  85. -- icon id / first selected line: 0 / 0
  86. -- text alignment: 1
  87. -- font id: 0
  88. -- text size: 12
  89. -- style flags: 0
  90. -- line height: 16
  91. -- part name: no
  92. ----- HyperTalk script -----
  93. on mouseUp
  94.   global direction
  95.  
  96.   putIntoFact "no",the short name of this card
  97.   chain direction
  98. end mouseUp
  99.  
  100.  
  101.  
  102. -- part 9 (button)
  103. -- low flags: 00
  104. -- high flags: 8003
  105. -- rect: left=363 top=150 right=165 bottom=444
  106. -- title width / last selected line: 0
  107. -- icon id / first selected line: 0 / 0
  108. -- text alignment: 1
  109. -- font id: 0
  110. -- text size: 12
  111. -- style flags: 0
  112. -- line height: 16
  113. -- part name: yes
  114. ----- HyperTalk script -----
  115. on mouseUp
  116.   global direction
  117.  
  118.   putIntoFact "yes",the short name of this card
  119.   chain direction
  120. end mouseUp
  121.  
  122.  
  123.  
  124. -- part 10 (field)
  125. -- low flags: 00
  126. -- high flags: 0002
  127. -- rect: left=363 top=121 right=136 bottom=484
  128. -- title width / last selected line: 0
  129. -- icon id / first selected line: 0 / 0
  130. -- text alignment: 0
  131. -- font id: 0
  132. -- text size: 12
  133. -- style flags: 0
  134. -- line height: 16
  135. -- part name: answer
  136. ----- HyperTalk script -----
  137. on returnInField
  138.   global direction
  139.  
  140.   putIntoFact card field "answer" of this card, the short name of this card
  141.   chain direction
  142. end returnInField
  143.